home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 January / CHIP Turkiye Ocak 1998.iso / ARACLAR / TF95140 / TEKFCT95.EXE / 0 / RCDATA / TMAINFAX / TMAINFAX.txt < prev   
Text File  |  1997-07-12  |  8KB  |  342 lines

  1. object MainFax: TMainFax
  2.   Left = 283
  3.   Top = 106
  4.   Width = 467
  5.   Height = 361
  6.   BorderIcons = []
  7.   Caption = 'TechFacts 95 Fax Utility'
  8.   Font.Color = clWindowText
  9.   Font.Height = -13
  10.   Font.Name = 'System'
  11.   Font.Style = []
  12.   Icon.Data = {<image000.ico>}
  13.   Position = poScreenCenter
  14.   OnClose = FormClose
  15.   OnShow = FormShow
  16.   PixelsPerInch = 96
  17.   TextHeight = 16
  18.   object Label1: TLabel
  19.     Left = 16
  20.     Top = 16
  21.     Width = 48
  22.     Height = 13
  23.     Caption = 'Station Id:'
  24.     Font.Color = clBlack
  25.     Font.Height = -11
  26.     Font.Name = 'MS Sans Serif'
  27.     Font.Style = []
  28.     ParentFont = False
  29.   end
  30.   object Label2: TLabel
  31.     Left = 16
  32.     Top = 48
  33.     Width = 60
  34.     Height = 13
  35.     Caption = 'Fax Number:'
  36.     Font.Color = clBlack
  37.     Font.Height = -11
  38.     Font.Name = 'MS Sans Serif'
  39.     Font.Style = []
  40.     ParentFont = False
  41.   end
  42.   object Label4: TLabel
  43.     Left = 238
  44.     Top = 48
  45.     Width = 50
  46.     Height = 13
  47.     Caption = 'Dial Prefix:'
  48.     Font.Color = clBlack
  49.     Font.Height = -11
  50.     Font.Name = 'MS Sans Serif'
  51.     Font.Style = []
  52.     ParentFont = False
  53.   end
  54.   object Label9: TLabel
  55.     Left = 16
  56.     Top = 74
  57.     Width = 58
  58.     Height = 13
  59.     Caption = 'Fax Header:'
  60.     Font.Color = clBlack
  61.     Font.Height = -11
  62.     Font.Name = 'MS Sans Serif'
  63.     Font.Style = []
  64.     ParentFont = False
  65.   end
  66.   object Label5: TLabel
  67.     Left = 221
  68.     Top = 74
  69.     Width = 63
  70.     Height = 14
  71.     AutoSize = False
  72.     Caption = 'Com Port:'
  73.     Font.Color = clBlack
  74.     Font.Height = -12
  75.     Font.Name = 'Courier New'
  76.     Font.Style = []
  77.     ParentFont = False
  78.   end
  79.   object Label6: TLabel
  80.     Left = 291
  81.     Top = 74
  82.     Width = 7
  83.     Height = 15
  84.     Font.Color = clBlack
  85.     Font.Height = -12
  86.     Font.Name = 'Courier New'
  87.     Font.Style = []
  88.     ParentFont = False
  89.   end
  90.   object Edit1: TEdit
  91.     Left = 93
  92.     Top = 14
  93.     Width = 177
  94.     Height = 24
  95.     Font.Color = clBlack
  96.     Font.Height = -11
  97.     Font.Name = 'MS Sans Serif'
  98.     Font.Style = []
  99.     ParentFont = False
  100.     TabOrder = 0
  101.     Text = 'TechFacts 95'
  102.   end
  103.   object Edit2: TEdit
  104.     Left = 93
  105.     Top = 46
  106.     Width = 137
  107.     Height = 24
  108.     Font.Color = clBlack
  109.     Font.Height = -11
  110.     Font.Name = 'MS Sans Serif'
  111.     Font.Style = []
  112.     ParentFont = False
  113.     TabOrder = 1
  114.   end
  115.   object Edit4: TEdit
  116.     Left = 293
  117.     Top = 46
  118.     Width = 57
  119.     Height = 24
  120.     Font.Color = clBlack
  121.     Font.Height = -11
  122.     Font.Name = 'MS Sans Serif'
  123.     Font.Style = []
  124.     ParentFont = False
  125.     TabOrder = 2
  126.   end
  127.   object Panel1: TPanel
  128.     Left = 16
  129.     Top = 90
  130.     Width = 343
  131.     Height = 104
  132.     TabOrder = 3
  133.     object Label3: TLabel
  134.       Left = 10
  135.       Top = 75
  136.       Width = 46
  137.       Height = 13
  138.       Caption = 'Message:'
  139.       Font.Color = clBlack
  140.       Font.Height = -11
  141.       Font.Name = 'MS Sans Serif'
  142.       Font.Style = []
  143.       ParentFont = False
  144.     end
  145.     object Label7: TLabel
  146.       Left = 10
  147.       Top = 10
  148.       Width = 26
  149.       Height = 13
  150.       Caption = 'From:'
  151.       Font.Color = clBlack
  152.       Font.Height = -11
  153.       Font.Name = 'MS Sans Serif'
  154.       Font.Style = []
  155.       ParentFont = False
  156.     end
  157.     object Label8: TLabel
  158.       Left = 10
  159.       Top = 42
  160.       Width = 16
  161.       Height = 13
  162.       Caption = 'To:'
  163.       Font.Color = clBlack
  164.       Font.Height = -11
  165.       Font.Name = 'MS Sans Serif'
  166.       Font.Style = []
  167.       ParentFont = False
  168.     end
  169.     object Edit3: TEdit
  170.       Left = 62
  171.       Top = 73
  172.       Width = 265
  173.       Height = 24
  174.       Font.Color = clBlack
  175.       Font.Height = -11
  176.       Font.Name = 'MS Sans Serif'
  177.       Font.Style = []
  178.       ParentFont = False
  179.       TabOrder = 2
  180.       Text = 'TechFacts 95 Fax Message'
  181.     end
  182.     object Edit6: TEdit
  183.       Left = 62
  184.       Top = 8
  185.       Width = 137
  186.       Height = 24
  187.       Font.Color = clBlack
  188.       Font.Height = -11
  189.       Font.Name = 'MS Sans Serif'
  190.       Font.Style = []
  191.       ParentFont = False
  192.       TabOrder = 0
  193.     end
  194.     object Edit7: TEdit
  195.       Left = 62
  196.       Top = 40
  197.       Width = 153
  198.       Height = 24
  199.       Font.Color = clBlack
  200.       Font.Height = -11
  201.       Font.Name = 'MS Sans Serif'
  202.       Font.Style = []
  203.       ParentFont = False
  204.       TabOrder = 1
  205.     end
  206.   end
  207.   object Panel2: TPanel
  208.     Left = 18
  209.     Top = 198
  210.     Width = 341
  211.     Height = 25
  212.     Font.Color = clBlack
  213.     Font.Height = -11
  214.     Font.Name = 'MS Sans Serif'
  215.     Font.Style = []
  216.     ParentFont = False
  217.     TabOrder = 4
  218.   end
  219.   object Panel3: TPanel
  220.     Left = 0
  221.     Top = 301
  222.     Width = 459
  223.     Height = 33
  224.     Align = alBottom
  225.     TabOrder = 5
  226.     object Panel4: TPanel
  227.       Left = 266
  228.       Top = 1
  229.       Width = 192
  230.       Height = 31
  231.       Align = alRight
  232.       BevelOuter = bvNone
  233.       TabOrder = 0
  234.       object BitBtn2: TBitBtn
  235.         Left = 8
  236.         Top = 3
  237.         Width = 82
  238.         Height = 23
  239.         Caption = '&Send Fax'
  240.         Font.Color = clBlack
  241.         Font.Height = -11
  242.         Font.Name = 'MS Sans Serif'
  243.         Font.Style = []
  244.         ParentFont = False
  245.         TabOrder = 0
  246.         OnClick = BitBtn2Click
  247.         Glyph.Data = {
  248.           76010000424D7601000000000000760000002800000020000000100000000100
  249.           04000000000000010000130B0000130B00000000000000000000000000000000
  250.           800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  251.           FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333303
  252.           333333333333337FF3333333333333903333333333333377FF33333333333399
  253.           03333FFFFFFFFF777FF3000000999999903377777777777777FF0FFFF0999999
  254.           99037F3337777777777F0FFFF099999999907F3FF777777777770F00F0999999
  255.           99037F773777777777730FFFF099999990337F3FF777777777330F00FFFFF099
  256.           03337F773333377773330FFFFFFFF09033337F3FF3FFF77733330F00F0000003
  257.           33337F773777777333330FFFF0FF033333337F3FF7F3733333330F08F0F03333
  258.           33337F7737F7333333330FFFF003333333337FFFF77333333333000000333333
  259.           3333777777333333333333333333333333333333333333333333}
  260.         NumGlyphs = 2
  261.       end
  262.       object BitBtn1: TBitBtn
  263.         Left = 99
  264.         Top = 3
  265.         Width = 81
  266.         Height = 23
  267.         Caption = '&Cancel'
  268.         Font.Color = clBlack
  269.         Font.Height = -11
  270.         Font.Name = 'MS Sans Serif'
  271.         Font.Style = []
  272.         ParentFont = False
  273.         TabOrder = 1
  274.         OnClick = BitBtn1Click
  275.         Kind = bkCancel
  276.       end
  277.     end
  278.   end
  279.   object ApdComPort1: TApdComPort
  280.     ComNumber = 3
  281.     InSize = 8192
  282.     OutSize = 8192
  283.     AutoOpen = False
  284.     HWFlowOptions = [hwfUseRTS, hwfRequireCTS]
  285.     BufferFull = 7372
  286.     BufferResume = 819
  287.     TraceName = 'c:\APD.TRC'
  288.     LogName = 'APD.LOG'
  289.     Left = 344
  290.   end
  291.   object ApdSendFax1: TApdSendFax
  292.     FaxClass = fcUnknown
  293.     ComPort = ApdComPort1
  294.     StatusDisplay = ApdFaxStatus1
  295.     FaxFile = 'd:\async\read.apf'
  296.     StatusInterval = 327
  297.     FaxFileExt = 'APF'
  298.     OnFaxFinish = ApdSendFax1FaxFinish
  299.     PhoneNumber = '260-7151'
  300.     Left = 184
  301.   end
  302.   object ApdFaxStatus1: TApdFaxStatus
  303.     Position = poScreenCenter
  304.     Ctl3D = True
  305.     Visible = False
  306.     Fax = ApdSendFax1
  307.     Left = 216
  308.   end
  309.   object OpenDialog1: TOpenDialog
  310.     DefaultExt = 'TXT'
  311.     FileEditStyle = fsEdit
  312.     Filter = 'Text Files|*.txt|Fax Files|*.apf'
  313.     Title = 'InfoSpy TechFax File Selection'
  314.     Left = 248
  315.   end
  316.   object FaxConverter: TApdFaxConverter
  317.     FontFile = 'APFAX.FNT'
  318.     FontType = ffStandard
  319.     Left = 312
  320.   end
  321.   object ApdModem1: TApdModem
  322.     ComPort = ApdComPort1
  323.     InitCmd = 'ATZ^M'
  324.     DialCmd = 'ATDT'
  325.     DialTerm = '^M'
  326.     DialCancel = '^M'
  327.     HangupCmd = '+++~~~ATH0^M'
  328.     ConfigCmd = 'ATE1Q0X1V1^M'
  329.     AnswerCmd = 'ATA^M'
  330.     OkMsg = 'OK'
  331.     ConnectMsg = 'CONNECT'
  332.     BusyMsg = 'BUSY'
  333.     VoiceMsg = 'VOICE'
  334.     NoCarrierMsg = 'NO CARRIER'
  335.     NoDialToneMsg = 'NO DIALTONE'
  336.     ErrorMsg = 'ERROR'
  337.     RingMsg = 'RING'
  338.     LockDTE = True
  339.     Left = 280
  340.   end
  341. end
  342.